﻿''' <summary>
''' 工程信息类
''' </summary>
''' <remarks></remarks>
<Serializable()> _
Public Class ProjectItem
    ''' <summary>
    ''' 构造函数
    ''' </summary>
    ''' <remarks></remarks>
    Public Sub New()
        _imageList = New List(Of ProjectImageItem)
        _DevTypeGroupList = New List(Of DevTypeItem)
        '*****************************
        '20090903
        _RefTypeInfoList = New List(Of RefTypeInfoItem)
        _DictoryItem = New ProjectDictoryItem()
        '_projectID = Guid.NewGuid().ToString()
        _projectID = ""
        _projectName = ""
        _remark = ""
        _listNo = 1
        _Phone = ""
        _COMNumber = 0
        _connectType = -1
        _DevCount = 0
        _RefCount = 0
        _VersionNo = ""
        _PhonePort = 0
        _IPAddress = ""
        _IPPort = 8000
        '20100423增加工程应用类型
        _projectType = 1
        _CcappDevList = New List(Of CcapDevItem)
        _CcapCommonItem = New CcapCommonItem()
    End Sub


    Private _projectID As String
    Public Property ProjectID() As String
        Get
            Return _projectID
        End Get
        Set(ByVal value As String)
            _projectID = value
        End Set
    End Property

    Private _VersionNo As String
    Public Property VersionNo() As String
        Get
            Return _VersionNo
        End Get
        Set(ByVal value As String)
            _VersionNo = value
        End Set
    End Property


    Private _projectName As String
    Public Property ProjectName() As String
        Get
            Return _projectName
        End Get
        Set(ByVal value As String)
            _projectName = value
        End Set
    End Property


    Private _remark As String
    Public Property Remark() As String
        Get
            Return _remark
        End Get
        Set(ByVal value As String)
            _remark = value
        End Set
    End Property


    Private _listNo As Integer
    Public Property listNo() As Integer
        Get
            Return _listNo
        End Get
        Set(ByVal value As Integer)
            _listNo = value
        End Set
    End Property


    Private _Phone As String
    Public Property Phone() As String
        Get
            Return _Phone
        End Get
        Set(ByVal value As String)
            _Phone = value
        End Set
    End Property
    ''' <summary>
    ''' 20100117增加电话端口号、IP地址、IP端口号信息
    ''' </summary>
    ''' <remarks></remarks>
    Private _PhonePort As Integer
    Public Property PhonePort() As Integer
        Get
            Return _PhonePort
        End Get
        Set(ByVal value As Integer)
            _PhonePort = value
        End Set
    End Property
    Private _IPAddress As String
    Public Property IPAddress() As String
        Get
            Return _IPAddress
        End Get
        Set(ByVal value As String)
            _IPAddress = value
        End Set
    End Property
    Private _IPPort As Integer
    Public Property IPPort() As Integer
        Get

            Return _IPPort
        End Get
        Set(ByVal value As Integer)
            _IPPort = value

        End Set
    End Property


    Private _COMNumber As Integer
    Public Property ComNumber() As Integer
        Get
            Return _COMNumber
        End Get
        Set(ByVal value As Integer)
            _COMNumber = value
        End Set
    End Property


    Private _AuthCode As String
    Public Property AuthCode() As String
        Get
            Return _AuthCode
        End Get
        Set(ByVal value As String)
            _AuthCode = value
        End Set
    End Property


    Private _connectType As Integer
    Public Property connectType() As Integer
        Get
            Return _connectType
        End Get
        Set(ByVal value As Integer)
            _connectType = value
        End Set
    End Property



    Private _DevCount As Integer  '控制器设备数量
    Public Property DevCount() As Integer
        Get
            Return _DevCount
        End Get
        Set(ByVal value As Integer)
            _DevCount = value
        End Set
    End Property


    Private _RefCount As Integer  '冷库数量
    Public Property RefCount() As Integer
        Get
            Return _RefCount
        End Get
        Set(ByVal value As Integer)
            _RefCount = value
        End Set
    End Property

    Private _imageList As IList(Of ProjectImageItem)
    Public Property imageList() As IList(Of ProjectImageItem)
        Get
            Return _imageList
        End Get
        Set(ByVal value As IList(Of ProjectImageItem))
            _imageList = value
        End Set
    End Property

    Private _DevTypeGroupList As IList(Of DevTypeItem)
    Public Property DevTypeGroupList() As IList(Of DevTypeItem)
        Get
            Return _DevTypeGroupList
        End Get
        Set(ByVal value As IList(Of DevTypeItem))
            _DevTypeGroupList = value
        End Set
    End Property

    Private _DictoryItem As ProjectDictoryItem
    Public Property DictoryItem() As ProjectDictoryItem
        Get
            Return _DictoryItem
        End Get
        Set(ByVal value As ProjectDictoryItem)
            _DictoryItem = value
        End Set
    End Property
    Private _RefTypeInfoList As IList(Of RefTypeInfoItem)
    Public Property RefTypeInfoList() As IList(Of RefTypeInfoItem)
        Get
            Return _RefTypeInfoList
        End Get
        Set(ByVal value As IList(Of RefTypeInfoItem))
            _RefTypeInfoList = value
        End Set
    End Property
    ''' <summary>
    ''' 制冷设备信息
    ''' </summary>
    ''' <remarks></remarks>
    Private _CcappDevList As IList(Of CcapDevItem)
    Public Property CcappDevList() As IList(Of CcapDevItem)
        Get
            Return _CcappDevList
        End Get
        Set(ByVal value As IList(Of CcapDevItem))
            _CcappDevList = value
        End Set
    End Property

    Private _CcapCommonItem As CcapCommonItem
    Public Property CcapCommonItem() As CcapCommonItem
        Get
            Return _CcapCommonItem
        End Get
        Set(ByVal value As CcapCommonItem)
            _CcapCommonItem = value
        End Set
    End Property
    ''' <summary>
    '''  工程类型(1: 冷库报警系统; 2: 移动车载报警系统; 3: 小批零报警系统;4:基础型制冷应用系统8DI;5:基础型仓储制冷混合系统8DI;6:基础型制冷应用系统24DI;7基础型仓储制冷混合系统24DI);
    ''' </summary>
    ''' <remarks></remarks>
    Private _projectType As Integer '
    Public Property ProjectType() As Integer
        Get
            Return _projectType
        End Get
        Set(ByVal value As Integer)
            _projectType = value
        End Set
    End Property

End Class
